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PRZFACE 



This publication contains the system- 
related information needed to install the 
IBM DOS/VS COBOL Compiler and its 
associated COBOL Object-time Subroutine 
Library. These program products operate 
under control of the IBM DOS/VSE System and 
the Conversational Monitor System (CMS) 
component of VM/SP (Virtual Machine 
Facility/System Product) . 

This publication is designed to be used 
in conjunction with, the DOS/VS COBOL 
Program Directory. 

Program Product Installation is directed 
to the system programmer or. planner 
responsible for the planning and/or 
implementation of system generation and 
maintenance. It contains information 
corresponding to that found in DOS/VSE 
System Generation . The operating system 
requirements, minimum machine 
configuration, work file requirements, and 
IOCS modules required for the DOS/VS 
compiler are described, as is the 
procedure for installing DOS/VS COBOL under 
DOS/VSE and VM/SP; This section also 
contains storage requirements for the 
compiler and the library. 

CMS messages produced for DOS/VS COBOL 
are described in the "Using DOS COBOL Under 
CMS" section of IBM CMS User's Guide for 
COBOL, SC28-6469. 
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Within the text, references are made to the 
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DOS/VSE System Management Guide , 
GC33-5371 

DOS/VSE System Generation , GC33-5377 

DOS/VSE System Control Statement , 
GC33-5376 

DOS/VSE Maintain System History Program 
(MSHP) User's Guide , GC33-6060 

DOS/VS COBOL Compiler and Library 
Programmer's Guide , SC28-6478 

Virtual Machine Facility/SP Planning and 
System Generation Guide , SC19-6203 

Virtual Machine Facility/SP j:mS User's 
Guide, SC19-6210 

DOS/VS Sort/Merge Programmer's Guide , 
SC33-4044 

DOS/VS Sort/Merge Installation Reference , 
SC33-4045 
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This is a major revision of, and makes obsolete, SC28-6U79-2, and its 
technical newsletters SN20-9181, SN20-9233, and SN20-9293. 

This edition applies to Release 3 of the IBM DOS/VS Compiler and Library, 
Program Products 57t6-CB1 and 5746-LM4, respectively, and to any 
subsequent releases until otherwise indicated in new editions or technical 
newsletters. 

The changes for this edition are summarized under "Summary of Amendments" 
following the preface. Because the technical changes in this edition are 
extensive and difficult to localize, they are not marked by vertical bars 
in the left margin. 

Changes are periodically made to the information herein; before using 
this publication in connection with the operation of IBM systems, consult 
the latest IBM System/370 and 4300 Processors Bibliography , GC20-0001, 
for the editions that are applicable and current. 

It is possible that this material may contain reference to, or 
information about, IBM products (machines and programs) , programming, or 
services that are not announced in your country. Such references or 
information must not be construed to mean that IBM intends to announce 
such IBM products, programming, or services in your country. 

Publications are not stocked at the address given below; requests for IBM 
publications should be made to your IBM representative or to the IBM 
branch office serving your locality. 

A form for reader's comments is provided at the back of this publica-tion. 
If the form has been removed, comments may be addressed to IBM . 
Corporation, P.O. Box 50020, Programming Publishing, San Jose, California, 
U.S.A. 95150. IBM may use or distribute any of the information you supply 
in any way it believes appropriate without incurring any obligation 
whatever. You may, of course, continue to use the information you supply. 
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Summary of Amendments Number 6 

Form of Publication: Revision 

Maintain System History Program (MSHP) 

New: Installation Procedures 

DOSA^S COBOL Release 3 is installed by the Maintain System 
History Program (MSHSP). The installation procedures have been 
rewritten to reflect the change. 

Summary of Amendments Number 5 

Form of Publication: TNL SN20-9293 
Support of Fixed Block Devices 

New: Programming Feature 



Support for fixed block devices is provided under DOS/VSE with VSE/ Advanced 
Function, Release 1. 



Summary of Amendments Number 4 



Form of Publication:, TNL SN20-9233 

Support of Additional Mass Storage Devices 

New: Programming Feature 

Support has been added for the 3330-1 1 Disk Storage and 3350 Direct 
Access Storage devices. 
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Summary of Amendments Number 3 

Date of Publication: December 3, 1976 

Form of Publication: TNL SN20-9 1 8 1 to SC28-6479-2 

IBM DOS/VS COBOL 

Maintenance: Documentation 

• Minor technical changes and additions have been made to the text. 
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INTRODUCTION 



The IBM DOS/VS COBOL Compiler ("the compiler") and Library is a Program 
Product that operates under control of the IBIl DOS/VSE system or the 
Conversational Monitor System (CMS) component of VM/SP. It contains 
the COBOL compiler, as well as the COBOL subroutines that, when required, 
are combined by the Linkage Editor with the object program produced by 
the compiler. It also contains a set of transient routines that can be 
fetched dynamically into the user's storage area during program execution, 
It also contains a special set of COBOL statements that can be used to 
perform 3886 processing. It accepts as input any program written in 
DOS/VS COBOL. 

The DOS/VS COBOL Object-time Subroutine Library ("the library") 
associated with the DOS/VS compiler is also available as a separate 
Program Product. It contains COBOL subroutines that, when required, are 
combined by the Linkage Editor with the object program produced by the 
DOS/VS compiler. The subroutine library also contains a set of 
transient routines that can te fetched dynamically into the transient 
area or loaded dynamically into the user's storage area during program 
execution. 

Link-edited programs that have been compiled by the DOS/VS COBOL , 
compiler (5746-CBl) all require the presence of the DOS/VS COBOL Library 
at execution time. Note that a separate library may not be needed. The 
library packaged with the compiler can be used if the programs are 
executing on the same processor as the one on which they are compiled or 
if they are executing under CMS; otherwise, there must be a separate 
library (5746-LM4) for each processor on which the programs are executing. 

The CMS installation must order and install DOS/VSE (Advanced Function 
Release 3 or later) . If the DOS/VS COBOL programs access any VSAM data 
sets, VSE/VSAM must also be installed. If the DOS/VS COBOL programs use 
SORT or MERGE, DOS/VSE Sort/Merge must be installed. Then, the CMS 
installation must install the DOS/VS COBOL compiler and library. The 
compiler must be link-edited in the background partition of DOS/VS, and 
all of the compiler's relocatable modules must be link-edited using the 
ACTION REL CLEAR linkage editor control statement.' The compiler and 
library may reside on the DOS/VSE system pack or on private libraries. 

When the DOS/VS COBOL compiler is executed under CMS, it must be 
executed in the CMS/DOS environment. Before invoking the DOS/VS COBOL 
compiler or executing DOS/VS COBOL programs under CMS, be sure that the 
CMS/DOS environment has been previously generated into your CMS system 
and is active. Also, when the DOS/VS COBOL compiler and DOS/VS COBOL 
programs are executed under CMS, the DOS/VSE system pack or private 
libraries must be available to CMS. 
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PROGRAM PRODUCT INSTALLATION 



This section contains, the information you will need to add the IBM DOS/VS 
COBOL Compiler and its associated COBOL Object-time Subroutine library to 
your DOS/VSE System. 

The first part of this section, "System Requirements," describes the 
operating system requirements, minimum machine configuration, work file 
requirements, and LIOCS modules required by the compiler. The second 
part, "Installation Procedure," gives instructions for adding the 
compiler and the library to the system. The third part, "Storage 
Requirements," describes the amount of space required by the compiler 
and the library. 



SYSTEM REQUIREMENTS 

For DOS/VS, the compiler and the library operate under control of the 
IBM Disk Operating System (DOS/VSE) . A DOS/VSE Advanced Function 
Release 3 system is the minimum level required. The minimum machine 
configuration and operating system requirements to support the compiler 
and library are described in this section. Execution-time 
considerations and special requirements for use of the Sort feature and 
the Symbolic Debug feature are also discussed. 

For CMS, the compiler and library are controlled by the CMS/DOS 
environment. A DOS/VSE system pack or DOS/VSE private libraries must be 
available for CMS/DOS use. CMS/DOS requires a DOS/VSE Advanced 
Function Release 3 system as a minimum level. The minimum virtual 
machine configuration and operating system requirements to support the 
compiler and library under CMS are described in this section. Other 
execution-time considerations are also discussed in this section. 



OPERATING SYSTEM REQUIREMENTS 

If the SORT or MERGE verb is used in the source program under DOS/VSE, 
the DOS/VSE Sort/Merge Program Product, Program Number 5746-SM2, is 
required. For further information on this product, see DOS/VS SORT / 
MERGE Programmer ' s Guide and DOS/VS SORT/MERGE Installation Reference 
Material. 

During link-editing, modules produced by the compiler require 
subroutines from the library. In addition, subroutines from the library 
may be required during execution. Therefore, the library must also be 
part of the system used to control program execution. 

CMS requires access to the DOS/VSE System pack or the private 
libraries that contain the DOS/VS COBOL compiler or subroutines. To 
make the system pack available at virtual address 195 as your C-disk, 
specify the filemode when the CMS/DOS environment is invoked: 
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ACCESS 195 C 
SET DOS ON C 

To make private libraries at address 193 available, access the disk 
specifying some CMS mode letter such as D, and issue ASSGN and DLBL 
commands after the CMS/DOS environment is invoked: 

ACCESS 193 D 

SET DOS ON 

ASSGN SYSCLB D 

DLBL IJSYSCL D DSN ? (SYSCLB) 

ASSGN SYSRLB D 

DLBL JJSYSKL D DSN ? (SYSRLB) 



MACHINE CONFIGURATION FOR DOS/VSE 

The minimum DOS/VSE machine configuration required to use the DOS/VS 
COBOL compiler and library is: 

1. A System/370, 303X or 4300 model supported by .DOS/VSE. At least 
128K bytes must be available to the compiler. 

2. Six work files. 

The system logical unit SYSLNK must be assigned to a single area 
(extent) on a 2311, 2314, 2319, 3330, 3340, 3350, 3375, or fixed 
block mass storage device. 

Five programmer logical units (SYS001 through SYS005) must 
reside on 2400, 3410, or 3420 tape units, or on 2311, 2314, 2319, 
3330, 3340, 3350, 3375, or fixed block mass storage devices. 
(Two programmer logical units, as well as the operating system, 
must reside on a mass storage device.) 

If the four remaining logical units reside on tape, there must 
be a separate tape unit for each data set. If they reside on a 
mass storage device, there must be enough space on that device. 
See "Work File Requirements" for further information- 

Workfile assignments must be made as follows: 

SYS001 — disk unit 

SYS002 — disk or tape unit 

SYS003 -- disk or tape unit 

SYSOOa — disk or tape unit 

SYS005 -- disk or tape unit (required when Symbolic Debug is 

requested at compile time) 
SYS0 06 — disk unit (required for FIPS) 

Note that SYSLNK need not be assigned at compile time unless the 
CATAL or LINK option is in effect. 

The filenames for SYSLNK and SYSC0 1 through SYS006 on the TLBL 
or DLBL statements are IJSYSLN, US YSO 1 , IJSYS02, IJSYS03, IJSYSOU, 
IJSYS05, and IJSYS06, respectively. 

3. A device for direct operator communication. 

4. A device, such as a card reader, for the job input stream. 
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5- A device, such as a printer or tape unit, for system output files. 

6. The floating-point arithmetic feature, if floating point literals 
or calculations are used- 

Note ; All devices currently supported by previous IBM DOS COBOL 
compilers are supported by the IBM DOS/VS COBOL Compiler- These 
include: 3504/3505 (with OMP) , 3525 (with RCE and combined function 
processing), 3410/3420 Tapes, 3881 Optical Mark Reader, and 3330 Disk. 
The DOS/VS compiler also supports the 5425 Multifunction Card Unit, 2560 
Multifunction Card Machine, 3203 and 520 3 Advanced Printers, 3886 
Optical Character Reader, 3340* Disk Facility, 3344 Direct Access 
Storage, 3350 Direct Access Storage in 3 330-1 compatibility mode, and 
3540 Diskette Input/Output Unit- 



Exe cut ion- Time consideration 

The amount of virtual storage must be sufficient to accommodate at 
least: 

• The selected control program 

• Support for the file processing techniques used 

• The load module to be executed 

If symbolic debugging is requested, an additional work file, SYS005, 
must be assigned at compile time- This file must also be assigned at 
execution time if symbolic debugging control cards are present, though 
not necessarily to SYS005- 

If execution statistics, VSAM, or the 3886 Optical Character 
Reader feature are requested, additional virtual storage must be 
available to accommodate its dynamic space requirements. 

Use of the symbolic debugging, flow trace, statement number, 
execution statistics, option or the 3886 Optical Character Reader 
feature requires additional storage during execution. See IBM DOS/VS 
COBOL Coirpiler and Library Programmer's Guide for further information. 



Sort /Merge Feature Considerations 

The DOS/VSE Sort/Merge Program Product, Program Number 5746-8112, must be 
executed under control of DOS/VSE. It requires the following minimum 
machine configuration. 

1. The DOS/VS Sort/Ilerge Program Product uses 40K bytes; an additional 
6K bytes are needed for DOS/VSE and for user-written routines. 

Note : Performance often increases significantly if 50K bytes is 
available for operation of the Sort/Merge program. At the 100K- 
byte level, the performance could be even higher. 

2. Standard instruction set- 

3. At least one 2314, 2319, 3330, 3333, 3340, or 3350 work file. 

(System residence requirements may necessitate having an 
additional disk storage unit for sorting.) 

4- One IBM 1403, 1443, 3203, 5203, or 3211 Printer, or one IBM 
operator communication device (for example, 3215). 
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5. One IBM 1442, 2501, 2520, 2540, 3505, 3525, or 2560 Card Reader, or 
one IBM 2400 or 3400 Series Magnetic Tape Unit (7- or 9-track) 
assigned to SYSIPT and SYSRDR. 

6. Three IBM 240 or 3 400 Series Magnetic Tape Units for work files 
when tape units are to Jbe used for intermediate storage. For a 
merge operation, no work units are required. 



Symbolic Debug considerations 

To use the Symbolic Debug feature of the DOS/VSE compiler, a fifth work 
file (SYS005) is required at compile time. When symbolic debugging is 
requested, the compiler records in SYS00 5 uhe information needed to 
produce a symbolic formatted diomp if the program terminates abnormally 
or if dynamic dumps are requested. Thus, the file assigned to SYS005 at 
compile time must, also be assigned at execution time. This file need 
not necessarily be assigned to SYS00 5, but it must be assigned in the 
partition in which the program is executed. 

SYS005 can be allocated with the other system work files (SYS001, 
SYS002, SYS0 03, SYS004) at system generation time. Each COBOL source 
program requesting symbolic debugging then uses the same work file. 
However, unique symbolic debugging work file assignments are required 
when several COBOL programs are to be compiled in the same job. If 
there is only one SYS005 allocated for use by all COBOL programs, 
information recorded on the file during compilation of one program is 
overlaid by information placed there during compilation of a subsequent 
program. Then, when the object modules are link edited and executed, 
the information recorded during compilation will nor be available if it 
has been overlaid. 

To avoid the loss of the information needed to produce a symbolic 
formatted dump, assign a unique symbolic debugging work file for each 
COBOL source program to be compiled. On a mass' storage device, these 
symbolic debugging work files must be assigned to non- overlapping 
extents. The following example shows how to use ASSGN statements to 
define the symbolic debugging work file on disk. Note that the 
compilation step assigns this data set to SYS005; at execution, it is 
assigned to SYS006. 

// JOB SAMPLE 

// OPTION SYM,NODECK,NOLISTX,NOXREF,LINK 

// ASSGN SYS005,X'192» 

// DLBL DEMOXX,99/101,SD 

// EXTENT SYS005, 111111, 1,0, 1100, 50 

// EXEC FCOBOL 

CBL SYMDMP 

(COBOL source deck) 

/* 

// EXEC LNKEDT 

// ASSGN SYS006,X»192« 

// DLBL DEMOXX, 99/101,SD 

//EXTENT SYSOO 6,11 1111,1,0,1100,50 

// EXEC 



(SYMDMP control cards) 



/* 
/S 
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If the symbolic debugging work file is defined as a tape, one 
physical reel is required. The file-protect ring must be in the tape 
reel during compilation and execution. 

FTPS Considerations 

SYS 00 6 is required only for FIFS processing. After printing the 
header and any CBL card options on SYSLST, the compiler writes the 
compilation listing on SYS006 as input to the FIPS phases. The FIPS 
output is written on SYSLST. 



MACHINE CONFIGURATION FOR CMS 

The minimum CMS virtual machine configuration will support the DOS/VS 
COBOL compiler and library. 

1 . A CMS virtual machine with a minimum of 320K bytes of virtual storage 
and with the CMS /DOS environment active is required. The compiler 
uses at least 60K bytes of CMS user storage. 

2- System and Logical Units. 

SYSIN/SYSIPT must be assigned to the device that contains the input 
source file. SYSIN/SYSIPT can be assigned to a reader, tape, or 
disk. 

The user can issue the ASSGN command for the following units: 

SYSPCH to tape, punch, disk, or IGN 
SYSLST to tape, printer, disk, or IGN 
SYSLOG to terminal 
SYS001-SYS002 to disk 
SYS003-SYS005 to tape or disk 
SYS 006 to disk 

Note ; CMS allows "disk" to also be the 3350 in native mode. CMS does 
not support the 3540 diskette, 2311 disks, or the 2321 datacell. If 
SYSIN/SYSIPT is unassigned at compilation time, the CMS/DOS COBOL 
interface issues an error message and terminates the FCOBOL command. 

If SYSPCH, SYSLST, SYSLOG, or SYSOOOI-SYSnnn is unassigned at 
compilation time, the CMS/DOS COBOL interface sends the output to the 
SYSIN disk (if SYSIN is assigned to a read/write disk) or to the user's 
A-disk. 

Note ; SYSLNK must not be assigned; it is not supported as a system 
logical unit under CMS/DOS,, 

3. Device Support 

The following devices, which are supported by DOS/VS, are not 
supported by CMS/DOS; 

• Card Readers ; 1442, 2560P, 2560S, 2596, 3504, 5425P, and 5425S. 

• Disks ; 3540, 2311, 2321. 

• Printers ; 2560P, 2560S, 3203, 3525, 5203, 5425P, and 5425S. 

• Other Devices ; 3 881 OMR, 38860CR 

6 DOS/VS COBOL Installation Reference Material 



Not all of the DOS/VSE LIOCS modules are supported in CMS/DOS; see the 
"LIOCS Modules" section of this manual for more information. 



Execution- Time Considerations 

If symbolic debugging is requested , an additional work file, SYS005, 
should be assigned at compile time. This file should also be assigned 
at execution time if symbolic debugging control statements are present, 
though not necessarily to SYS005. If the file is not assigned, the 
CMS/DOS COBOL interface directs the output to the SYSIN disk (if SYSIN 
is assigned to a read/write disk) or to the user's A-disk. 

The SORT verb is not supported in CMS/DOS. Also, COBOL programs that 
use ISAM or segmentation cannot be executed under CMS/DOS. 



WORK FILE REQUIREMENTS 

This section describes the work files required by the Compiler. In 
addition to SYSRES and SYSLNK, which must be assigned to disk units, the 
compiler may require up to six work files: SYS001, SYS002, SYS003, 
SYS004, SYS005, and SYS0 06- SYS005 is required only when the Symbolic 
Debug feature is requested- SYS006 is required for FIPS- Note ; SYSLNK 
is not supported and must not be assigned for CMS/DOS- 

SYS001 and SYS0 06 must be assigned to a disk unit. Each of the other 
data sets (SYS002, SYS003, SYSOOU, and SYS005) can be assigned to either 
a tape unit or a disk unit. 

If the work files are on tape, each must be assigned to a separate 
tape unit- If the work files are on disk, the amount of disk work space 
required depends mainly on the size of the source program. The 
approximate percentages of tracks that should be assigned to each work 
file are shown in Figures 1 through 6. Estimates are for programs of 
approximately 1000 and 2100 source records. The programs are assumed to 
request a cross-reference listing, the symbolic debug feature, and the 
source program library facility (COPY and/or BASIS)- source programs 
with the library facility require the LIB option on the COBOL option 
card (CBL card) . Programs using NOLIB require considerably less SYS004 
work space. 

For DOS/VSE, work file assignments for the compiler must be made in 
each partition in which the compiler operates. For example, if the 
compiler can operate in either the background or the foreground 1 (F1) 
partition, work file assignments must be made in both the background and 
F1, The CMS/DOS environment simulates only the background partition. 
CMS/DOS does not support the 2311- 
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Figure 1. Approximate Allocation of Work File Space — IBM 2311 
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Figure 2. Approximate Allocation of Work File Space — IBM 2314 
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Figure 3. Approximate Allocation of Work File Space — IBM 3330 
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Figure 4. Approximate Allocation of Work File Space — IBM 3340 
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Approximate Allocation of Work File Space — IBM 3350 
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Figure 6. Approximate Allocation of Work File Space — Fixed Block 
Device (BUFSIZE equals 512) 
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FIPS Work Files 

The number of tracks required for SYS(/06 (the FIPS input file) 
depends on the size of the source program and compiler options 
specified. As basic output, each record contains a line of the 
compilation listing and is 121 characters in length. However, 
additional space is required whenever each of the following options is 
specified: SYM, LISTX or CLIST, XREF or SXREF. SYS006 also contains 
any error messages issued by the compiler. 



LIOCS MODULES 

The following lists contain the names of the preassembled LIOCS modules 
used by the compiler. These modules are supplied by IBM as part of the 

relocatable library when the IBM DOS/VSE System is distributed. Be sure 
that the modules listed are included in the system to which the compiler 
is added. 

Certain preassembled LIOCS modules are required when cataloging IBM 
components to the core image library. Do not delete these modules from 
the relocatable library until after all the IBM components have been 
cataloged to the core image library and all program products have been 
installed. These modules are listed in "Required IOCS Modules." 

Notes : 

1, Additional LIOCS modules (for ASCII processing) are distributed 

with the DOS/VSE subroutines and are added to the relocatable 
library with the subroutines. These LIOCS modules are listed under 
"Relocatable Library" in the "Storage Requirements" section- 

2. CMS/DOS does not support all the DOS/VSE logical transients, nor 
all the operands of the transients it does support. The CMS/DOS 
logical transient support is described in the VM/SP User ' s 
Guide . 

The procedure for generating the compiler for use with CMS/DOS is 
exactly the same as the procedure for generating it for use with DOS/VSE; 
the LIOCS modules required are the same. CMS/DOS, during its open 
routines, checks that the file being opened is supported by CMS/DOS. 



Relocatable Module Naming Conventions 

Each module has an 8-character name. The name consists of a 3-character 
prefix and a 5 -character field corresponding to the option permitted in 
generation of the module. The following 3-character prefixes identify 
the preassembled modules shipped by IBM: 

IJC I/O Card (CDMOD) 

IJD I/O Printer (PRMOD) 

IJF I/O Magnetic Tape (MTMOD) 

IJG Sequential Direct Access (SDMOD) 
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IJH Index sequential Direct Access (ISMOD) » 

IJI Direct Access Method (DAMOD) ^ 

IJJ Device Independent Access Method (DIMOD) 

UN 3540 Access Method (DUMOD) i 



iISMOD, DAMOD, and DUMOD are not supported for the CMS/DOS environment. 
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CDMOD 



CDMOD name = IJCabcde 

a = F RECFORM=FIXUNB (always for INPUT and CMBND files) 

= U RECFORM=UNDEF 

= V RECFORM=VARUNB 

b = A C'ELCHR=ASA (not specified CMBND) 

= C CCNTRCL=YES 

= Y CTLCHR=YES 

= Z neither CTLCHR nor CONTROL is specified 

C = B RIX)NLY=YES and TYPEFLE=CMBND 

= C TYPEFLE=CMBND 

= H RDONLY=YES and TYPEFLE= INPUT 

= I TYPEFLE=INPUT 

= N RDONLY=YES and TYPEFLE=OUTPUT 

= O TYPEFLE=OUTPUT 

d = B WORKA=YES and I0AREA2=YES 

= I I0AREA2=YES 

= W WORKA=YES 

= Z neither WORKA nor I0AREA2 is specified 

= Z WORKA is not specified (for CMBND files only) 

e = DEVICE=2540 

= 1 DEVICE=iaa2 

= 2 DEVICE=2520 

= 3 DEVICE=2501 

= t| DEVICE=25aO and CRDERR is specified 

= 5 DEVICE=2520 and CRDERR is specified 

= 6 DEVICE=3505 

= 7 DEVICE=3525 and FUNC omitted or FUNC=R or P 

= 8 DEVICE=2560 and FUNC omitted or FUNC=R or P 

= 9 DEVICE=5a25 and FUNC omitted or FUNC=R or P 

= A DEVICE=3525 and FUNC=RP 

= B DEVICE=3525 and FUNC=RW 

= C DEVICE=3525 and FUNC=PW 

= D DEVICE=3525 and FUNC=I 

= E DEVICE=3525 and FUNC=RPW 

= F DEVICE=2560 and FUNC=RP 

= G DEVICE=2560 and FUNC=RW 

= H DEVICE=2560 and FUNC=PW 

= I DEVICE=2560 and FUNC=I 

= J DEVICE=25 60 and FUNC=RPW 

= K DEVICE=5a25 and FUNC=RP 

= L DEVICE=5425 and FUNC=RW 

= M DEVICE=5a25 and FUNC=PW 

= N DEVICE=5425 and FUNC=I 

= O DEVICE=5a25 and FUNC=RPW 
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CDMOD Names 



IJCFAOI 1 
IJCFAOm 
IJCFA0I5 
IJCFA0I7 
UCFA0I8 
IJCFAOI 9 
IJCFA0Z1 
IJCFA0Z4 



IJCFA0Z5 
IJCFA0Z7 
IJCFA0Z8 
IJCFA0Z9 
IJCFAOZA 
IJCFAOZC 
IJCFAOZE 
IJCFAOZF 
IJCFAOZH 
IJCFAOZI 
IJCFAOZJ 
IJCFAOZK 
UCFAOZM 
IJCFAOZN 
IJCFAOZO 
IJCFCIZO 
IJCFCIZ1 
IJCFCI Z2 
IJCFCIZ6 
IJCFYOIO 
IJCFYOI7 



IJCFZIIO 
UCFZII1 
IJCFZII2 
IJCFZII3 
IJCFZII6 
IJCFZII7 
IJCFZII8 
IJCFZII9 
IJCFZIZO 



UCFZIZ1 
IJCFZIZ2 
IJCFZIZ3 
IJCFZIZ6 
IJCFZIZ7 
IJCFZIZB 
IJCFZIZ9 
IJCFZIZA 
IJCFZIZB 
IJCFZIZE 
IJCFZIZF 
IJCFZIZG 
UCFZIZJ 
IJCFZIZK 
IJCFZIZL 
IJCFZIZO 
IJCFZ0I1 
IJCFZ0I4 



IJCFZ0I5 
IJCFZ0I7 
IJCFZOIB 
IJCFZ0I9 
IJCFZOID 
IJCFZOZ1 
IJCFZOZU 
IJCFZ0Z5 
IJCFZOZ7 
IJFCZOZB 
IJCFZ0Z9 
IJCFZOZA 
IJCFZOZC 
IJCFZOZD 
IJCFZOZE 
IJCFZOZF 
IJCFZOZH 

IJCFZOZI 
IJCFZOZJ 
IJCFZOZK 
IJCFZOZM 
IJCFZOZN 
IJCFZOZO 



iJcuAoia 

IJCUA0I5 
IJCUAOIB 
IJCUAOI9 



IJCUA0Z1 

iJcuAoza 

IJCUA0Z5 
IJCUAOZ8 
IJCUA0Z9 
IJCUAOZF 
IJCUAOZH 
IJCUAOZI 
IJCUAOZJ 
IJCUAOZK 
IJCUAOZM 
IJCUAOZN 
IJCUAOZO 



IJCUZII8 
IJCUZII9 
IJCUZIZ8 
IJCUZIZ9 
IJCUZIZF 
IJCUZIZG 
IJCUZIZJ 
IJCUZIZK 
IJCUZIZL 
IJCUZIZO 



IJCUZ0I1 
I JCU Z0I4 



IJCUZ0I5 
IJCUZ0I7 
IJCUZOI8 

IJCUZ0I9 
IJCUZ0Z1 
IJCUZOZ4 
IJCUZ0Z5 
IJCUZOZ7 
IJCUZ0Z8 
IJCUZ0Z9 
IJCUZOZF 
IJCUZOZH 
IJCUZOZI 
IJCUZOZJ 
IJCUZOZK 
IJCUZOZM 

IJCUZOZN 
IJCUZOZO 



IJCVA0I1 
IJCVAOI4 

IJCVA0I5 
IJCVA0I8 
IJCVAOI9 
IJCVA0Z1 
IJCVAOZU 
IJCVA0Z5 
IJCVA0Z8 
IJCVA0Z9 



IJCVAOZF 
IJCVAOZH 
IJCVAOZI 
IJCVAOZJ 
IJCVAOZK 
IJCVAOZM 
IJCVAOZN 
IJCVAOZO 



IJCVZII8 
IJCVZII9 
IJCVZIZ8 
IJCVZIZ9 
IJCVZIZF 
IJCVZIZG 
IJCVZIZJ 
IJCVZIZK 
IJCVZIZL 
IJCVZIZO 



IJCVZ0I1 
IJCVZOIU 
IJCVZ0I5 
IJCVZ0I7 
IJCVZOIB 



IJCVZ0I9 



IJCVZOZ1 
IJCVZOZU 
IJCVZ0Z5 
IJCVZ0Z7 
IJCVZOZ8 
IJCVZ0Z9 
IJCVZOZF 
IJCVZOZH 
IJCVZOZI 
IJCVZOZJ 
IJCVZOZK 
IJCVZOZM 
IJCVZOZN 
IJCVZOZO 
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DAMOD 



DAMOD name = IJIabcde 

a = B RBCFORM=UNDEF (handles both UNDEF and FIXUNB) 

= F RECFORM=FIXUNB 

= S RZCFORM=SPNUNB 

= V RECFORM=VARUNB 

b = A AFTER=YES 

= Z AFTER is not specified 

C = E IDLOC=YES and FEOVD=YES 

= I IDLOC=YES 

= R FEOVD=YES 

= Z neither is specified 

d = H ERREXT=YES and RELTRK=YES 

= P ERREXT=YES 

= R RELTRK=YES 

= Z neither is specified 

e = W HOLD=YES and RDONLY=YES 

= X HOLD=YES 

= Y RDONLY=YES 

= Z neither is specified 



DAMOD Names 

IJIBAIRZ IJIFZZZZ 

IJIBAIZZ IJISAIRZ 

IJIBAZRZ IJISAIZZ 

IJIBAZZZ IJISAZRZ 

IJIBZIRZ IJISAZZZ 



UIBZIZZ IJISZIRZ 

IJIBZZRZ IJISZIZZ 

IJIBZZZZ IJISZZRZ 

IJIFAIRZ IJISZZZZ 
IJIFAIZZ 



IJIFAZRZ 
IJIFAZZZ 
IJIFZIRZ 
IJIFZIZZ 
IJIFZZRZ 
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ERMOD 



ERMOD name = IJMZabDO 

a = S SETDEV = YES 
= Z SETDEV = NO 

b = R RDONLY = YES 
. = Z RDONLY = NO 



DRMOD Names 



IJMZSRDO 
IJMZSZDO 
IJMZZRDO 
IJMZZZDO 



DUMOD 



DUMOD name = IJNDabcZ 

a = I input 
= O output 

b = C ERROPT=name 

c = Z RDONLY not specified 



DUMOD Names 



IJNDICZZ 
IJNDOCZZ 
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ISMOD 



ISMOD naire = IJHabcde 

a = A RECFORM=BOTH and IOROUT=ADD or ADDRTR 

= B RECFORM=FIXBLK and IOROUT=ADD or ADDRTR 

= U RECFORM=FIXUNB and IOROUT=ADD or ADDRTR 

= Z RBCFORM is not specified and IOROUT=LOAD or RETRVE 

b = A I OROUT= ADDRTR 

= I IOROUT=ADD 

= L ICROUT=LOAD 

= R I OROUT= RETRVE 

C = B TYPEFLE=RANSEQ 

= G I0AREA2=YES and TYPEFLE=SEQNTL or IOROUT=LOAD 

= R TyPEFLE=RANDOM 

= S TYPEFLE=SEQNTL 

= Z neither is specified and IOROUT=LOAD or ADD 

d = C CORINDX=YES 

= Z CORINDX is not specified 

e = F CORDATA=YES, ERREXT=YES, and RDONLY=YES 

= G CORDATA=YES and ERREXT=YES 

= O CORDATA=YES and RDONLY=YES 

= P CORDATA=YES 

= S EPPEXT=YES and RDONLY=YES 

= T ERREXT=YES 

= Y RDONLY=YES 

= Z nothing is specified 



ISMOD Names 

IJHAAECP IJHUABZZ 

IJHAARCZ IJHUARCP 

IJHAARZP IJHUARCZ 

UHAARZZ IJHUARZP 

IJHBABCP IJHUARZZ 

UHBABCZ IJHZLGZZ 

IJHBABZP IJHZLZZZ 

IJHBABZZ IJHZRECZ 

UHBARCP IJHZRBZZ 
IJHBARCZ 

UHBARZP IJHZRGZZ 

IJHBARZZ IJHZRRZZ 

IJHUABCP IJHZRSZZ 
UHUABCZ 
IJHUABZP 
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MTMOD 



MTMOD name = IJFabcde 

a = F RECFORM=FIXUNB or FIXBLK 

= S RBCFOEM=SPNUNB or SPNBLK 

= U RECFOFM=UNDEF 

= V RECFORM=VARUNB or VARBLK 

= X ASCII RECFORM=FIXUNB or FIXBLK 

= N ASCII RECFORM=UNDEF 

= R ASCII RECFORM=VARUNB Or VARBLK 

b = E READ=BACK 

= Z READ= FORWARD, or READ is not specified 

C = C CKPTREC=YES 

= Z CKPTREC is not, specified 

d = W WORKA=YES 

= Z WORKA is not specified 

e = M ERREXT=YES and RDONLY=YES 

= N ERREXT=YES 

= Y RDONLY=YES 

= Z neither is specified 

MTMOD Names (See "Relocatable library" in the "Storage Estimates" 
section for additional MTMOD modules.) 

UFFBZZN 
IJFFZCZZ 
IJFFZZZZ 
IJFSZZWN 
IJFUZZZN 



IJFUZZZZ 
IJFVZZZN 
IJFVZZZZ 
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Name list for work file type modules (TYPEFLE=WORK) : 

MTMOD name = IJFabcde 

a = W always 

b = E ERROPT=YES 

= Z ERROPT is not specified 

C = N NOTEPNT=YES 
= S NCTEPNT=POINTS 
= Z NOTEPNT is not specified 

d = Z always 

e = M ERREXT=YES and RDONLY=YES 

= N ERREXT=YES 

= Y RDONLY=YES 

= Z neither is specified 

System I/O Modules 

(See "Required IOCS Modules" before deleting modules with the IJF 
prefix.) 

IJFWEZZZ 
IJFWZNZZ 
UFWZZZZ 
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PRMOD 



PRMOD name = IJDabcde 

a = F RECFOBM=FIXUNB 

= V RECFORM=VARUNB 

= U RECFORM=UNDEF 

b = A CTLCHR=ASA 

= Y C'rLCHR=YES 

= C CONTRCL=YES 

= S STLIST=YES 

= T DEVICE=3525 with 2-line printer 

= U DEVICE=2560 

= V DEVICE=5a25 

= Z neither CTLCHR nor CONTROL nor STLIST is specified 

C = P PRINTOV=YES, DEVICE not 3525 

= I PRINTOV=YES, DEVICE=3525, and FUNC Omitted or FUNC=W[T] 

= F PRINTOV=YES, DEVICE=3525, and FUNC=RW[ T ] 

= C PRINTOV=YES, DEVICE=3525, and FUNC=PW[T] 

= D PRINTOV=YES, DEVICE=3525, and FUNC=RPWCT] 

= E ERROPT=YES and PRINTOV=YES not specified 

= Z PRINTOV=YES not specified, and DEVICE not 3525 

= O PRINTOV=YES not specified, DEVICE=3525, and FUNC omitted 

or FUNC=W[T] 

= R PRINTOV=YES not specified, DEVICE=3525, and FUNC=RW[T] 

= S PRINTOV=YES not specified, DEVICE=3525, and FUNC=PW[T] 

= T PRINTOV=YES not specified, DEVICE=3525, and FUNC=RPW[T] 

= U DEVICE=2560 or 54 25 and FUNC=W or omitted 

= V DEVICE=25 60 or 54 25 and FUNC=RW 

= W DEVICE=25 60 or 54 25 and FUNC=PW 

= X DEVICE=2560 or 5425 and FUNC=RPW 

d = I ICAREA2=YES 

= Z ICIAREA2 is not specified 

e = V RDONLY=YES and WORKA=YES 

= W WORKA=YES 

= Y RDONLY=YES 

= Z neither is specified 



PRMOD Names 



UDFAPIZ 
IJDFAPZZ 
IJDFYPIZ 
UDFYPZZ 
IJDFZPIZ 



IJDUZPIZ 
IJDUZPZZ 
IJDVAPIZ 
IJDVAPZZ 
IJDVYPIZ 



UDFZPZZ 
IJDUAPIZ 
IJDUAPZZ 
UDUYPIZ 
IJDUYPZZ 



IJDVYPZZ 
IJDVZPIZ 
IJDVZPZZ 



IJDFUUZZ 
UDFUUIZ 
IJDFUVZZ 
UDFUVIZ 
IJDFUWZZ 
UDFUWIZ 



IJDVUUZZ 
IJDVUUIZ 
IJDVUVZZ 
IJDVUVIZ 
IJDVUWZZ 
IJDVUWIZ 



IJDUUUZZ 
IJDUUUIZ 
IJDUUVZZ 
IJDUUVIZ 
IJDUUWZZ 
IJDUUWIZ 



13 DOS/VS COBOL Installation Reference Material 



IJDFUXZZ 
UDFUXIZ 



IJDVUXZZ 
IJDVUXIZ 



IJDUUXZZ 
IJDUUXIZ 



UDFAOIZ 
IJDFARIZ 
UDFASIZ 
IJDFATIZ 



IJDVAOIZ 
IJDVARIZ 
IJDVASIZ 
IJDVATIZ 



IJDUAOIZ 
IJDUARIZ 
IJDUASIZ 
IJDUATIZ 



IJDFAOZZ 
IJDFARZZ 
IJDFASZZ 
IJDFATZZ 
IJDFZOIZ 
UDFZRIZ 
IJDFZSIZ 
UDFZTIZ 
IJDFZOZZ 
UDFZRZZ 
IJDFZSZZ 
UDFZTZZ 



IJDVAOZZ 
IJDVARZZ 
IJDVASZZ 
IJDVATZZ 
IJDVZOIZ 
IJDVZRIZ 
IJDVZSIZ 
IJDVZTIZ 
IJDVZOZZ 
IJDVZRZZ 
IJDVZSZZ 
IJDVZTZZ 



IJDUAOZZ 
IJDUARZZ 
IJDUASZZ 
IJDUATZZ 
IJDUZOIZ 
IJDUZRIZ 
IJDUZSIZ 
IJDUZTIZ 
IJDUZOZZ 
IJDUZRZZ 
IJDUZSZZ 
IJDUZTZZ 



IJDFAIIZ 
IJDFAFIZ 
IJDFACIZ 
IJDFADIZ 



IJDUAIIZ 
IJDUAFIZ 
IJDUACIZ 
IJDUAEIZ 



IJDVAIIZ 
IJDVAFIZ 
IJDVACIZ 
IJDVADIZ 



IJDFZIIZ 
IJDFZFIZ 
IJDFZCIZ 
UDFZDIZ 



IJDUZIIZ 
IJDUZFIZ 
IJDUZCIZ 
IJDUZDIZ 



IJDVZIIZ 
IJDVZFIZ 
IJDVZCIZ 
IJDVZDIZ 



IJDFYIIZ 
IJDFYFIZ 
UDFYCIZ 
IJDFYDIZ 



IJDUYIIZ 
IJDUYFIZ 
IJDUYCIZ 
IJDUYDIZ 



IJDVYIIZ 
IJDVYFIZ 
IJDVYCIZ 
IJDVYDIZ 



IJDFVU ZZ 
UDFVUIZ 
IJDFWZZ 
UDFWIZ 
IJDFVWZZ 
UDFVWIZ 
IJDFVXZZ 
IJDFVXIZ 



IJDWUZZ 
IJDWUIZ 
IJDVWZZ 
IJDVVVIZ 
IJDVVWZZ 
IJDVVWIZ 
IJDVVXZZ 
IJDVVXIZ 



IJDUVUZZ 
IJDUVUIZ 
IJDUWZZ 
IJDUWIZ 
IJDUVWZZ 
IJDUVWIZ 
IJDOVXZZ 
IJDUVXIZ 
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SDMOD 



SDMODxx name = IJGabcde 

a = C RBCFOPiy!=FIXUNB or FIXBLK and HOLD=YES 

= F RECFORM=FIXUNB or FIXBLK and HOLD is not specified 

= P RECFORM=SPNUNB or SPNELK and HOLD=YES 

= Q RECFORM=SFNUNB or SPNBLK and HOLD is not specified 

= R RECFORM=UNDEF and HOLD=YES 

= S RECFORM=VARUNB or VARBLK and HOLD=YES 

= U RECFORM=UNDEF and HOLD is not specified 

= V R ECFORM=VARUNB or VARBLK and HOLD is not specified 

b = I SDMODxI 

= O SCMODxO 

= U SDMODxU 

C = C ERROPT=YES and ERREXT=YES 

= E ERROPT=YES 

= Z neither is specified 

d = M TRUNCS=YES and FEOVD=YES 

= T T RUNG S= YES 

= W FEOVD=YES 

= Z neither is specified 

e = B CONTROL=YES and RDONLY=YES 

= C CCNTROL=YES 

= Y RDONLY=YES 

= Z neither is specified 



SDMOD Names 

IJGFIEWZ 
IJGFOEWZ 
IJGFUEWZ 
LJGQIEWZ 
IJGQOEWZ 



IJGQUEWZ 
UGUIEWZ 
IJGUOEWZ 
IJGUUEWZ 
IJGVIEWZ 



IJGVOEWZ 
UGVUEWZ 



2 DOS/VS COBOL Installation Reference Material 



NAME LIST FOR WORKFILE TYPE MODULES (TYPEFLE=WORK) 

SDMODxx name = IJGabcde 

a = T SDMODW specifies HOLD=YES 

= W SDMODW does not specify HOLD=YES 

b = C ERROPT=YES and EPREXT=YES 
= E ERROPT=YES 
= Z neither is specified 

C = N NOTEPNT=YES 

= R NOTEPNT=POINTRW 

= Z NOTEPNT is not specified 

d = C CCNTROL=YES 

= Z CONTROL is not specified 

e = T RDONLY=YES and UPDATE=YES 

= U UPDATE=YES 

= Y RDONLY=YES 

= z neither is specified 

System I/O Modules 

(See "Required IOCS Modules" before deleting modules with the IJG 
prefix. ) 

IJGWEZZU 
IJGWEZZZ 
IJGWZNZZ 
IJGWZRZZ 



Required lOCS .Modules 

The following preassembled IOCS modules are required when cataloging IBM 
components to the core image library. These modules are also required 
when installing program products. 

Module Names 

IJFWEZZZ IJJCPD1N 

IJFWZNZZ IJJCFE2 

IJFWZZZZ IJJCFE3 

IJGFIETZ IJJCPV 

IJGWEZZU IJJCPV 1 



IJGWEZZZ IJJCPV2 

IJGWZNZZ IJJCPO 

IJGWZRZZ IJJCPON 

IJJCPA1N IJJCP1 

IJJCPDV IJJCP1N 



IJJCPDV1 IJJCP2 

IJJCPDV 2 IJJCP3 

IJJCFDO 

IJJCPDON 

IJJCFD1 
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DOS/VS COBOL INSTALLATION -- DOS/VSE 

This section describes DOS/VS COBOL Compiler and Library installation 
under DOS/VSE. The steps that follov; present a brief overview of the 
installation process. 



LIBRARIES REQUIRED — DOS/VSE 

The three libraries needed are: 

• Core image library 

• Source statement library 

• Relocatable library 

INSTALLATION PROCESS — DOS/VSE 

To install DOS/VS COBOL using riSHP (Ilaintain System History Program) , 
take the following steps: 

1. Use the INSTALL PRODUCT to install the compiler and/or library. 

2. Optionally, code the CBL statement and place it in C.CBLOPTINS to 
change the compiler default options. 

For complete details on the installation process under DOS/VSE, see the 
DOS/VS COBOL Program Directory. 



VERIFYING SUCCESS — DOS/VS COMPILER INSTALLATION 

A sample DOS/VS COBOL program (TESTRUN) to verify the success of the 
compiler installation is available in the source statement library. The 
sample program will be placed in the source statement library during the 
installation process. 



APPLICATION OF CORRECTIVE MAINTENANCE 

Three link-edit books are supplied with the modules installed in the 
relocatable library: 

• ILACBVS for the compiler phases 

• ILBDSYML for the SYMDMP library phases 

• ILBD$LNK for the transient routines 
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It is recommended that these be used when link-editing the appropriate 
phases. 

Note that if user-v7ritten linkage editor control statements are used for 
linkage editing, ACTION CLEAR must be specified. 



DOS/VS COBOL INSTALLATION — VIl/SP 



This section describes DOS/VS COBOL Compiler and Library installation 
under VM/SP. DOS/VS COBOL runs in the CMS DOS environment. 



INSTALLATION PROCESS UNDER VM/SP CMS 

To install DOS/VS COBOL under CMS, take the following steps: 

1 . Mount the distribution tape. 

2. IPL the DOS/VSE system. 

3. Run the DOS/VSE MSHP program to restore the private libraries (just 
as normal installation under DOS/VSE) . 

For complete details on the installation process under VM/SP, see the 
DOS/VS COBOL Program Directory. 



System Gen er ati o n C pnsid er aticns 



The compiler and library can be used on a system only if the following 
parameters are specified for the SUPVR and FOPT macro instructions 
during system generation: 



SUPVP: 



FOPT: 



VSAM; 



SYSTEM=DISK 
ASCII=YES 

MPS=BJF 



AB=YES 
PCIL=YES 

GETVIS=YES 

RELLER=YES 
SYSFIL=YES 

VSAM=YES 



(required only when -che ASCII features cf the 

coirpiler are used) 
(required only when the compiler is to be executed 

in the foreground) 

(for use of STATE, FLOW, STXIT, SYMDMP, and COUNT 

features) 
(required only when the compiler is to be executed 

in the foreground and RELLDR=YES has not been 

specified) 
(required for use of 3886; forced by VSAM=YES, 

and required if COUNT option is specified) 
(if relocating loader is to be used) 
(if system files are to be on disk) 

(required for use of the VSAM feature) 



System options selected at system generation enable you to tailor the 
DOS/VSE compiler to fit your installation's needs. The system options 
that can be used to control compiler processing specify whether: 
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• control statements are to be written on SYSLST. 

• A dump is to be written on SYSLST if an abnormal termination occurs. 

(YOU may not want this if the SYMDMP, STATE, or FLOW features are 
used.) 

• The object module produced by the compiler is to be link edited. 

• An object deck is to be punched. 

• The COBOL source statements are to be written on SYSLST, 

• A Procedure Division map. Lata Division map, or cross-reference 
listing is to be written en SYSLST. 

• Diagnostic messages for the source program are to be written on 
SYSLST. 

Instructions for specifying these options are given in the publications 
DOS/VSE System Generation and DOS/VS Compiler ajid Library Programmer ' s 
Guide. 



CHANGING THE INSTALLATION DEFAULTS 

To change the compiler default values to suit your installation, a new 
member, C. CBLOPTNS, must be added to the source statement library. This 
module must contain CEL and LST option cards defining the desired 
defaults. These may be overridden at compilation time by supplying a 
CBL and/or LST statement in the compiler input stream. CMS/DCS does not 
support the LST statement. 



CBL Statement — COBOL Option Control Statement 

Although most options for compilation are specified either at system 
generation time or in the OPTION control statement, the COBOL compiler 
provides an additional statement, the CBL statement, for the 
specification of compile-tiire options unique to COBOL. 

The CBL statement must be placed between the EXEC FCOBOL statement 
and the first statement in the COBOL program. The CBL statement cannot 
be continued. However, if specification of options will continue past 
column 71, more than one CBL card image may be used. 

The options shown in the following format may appear in any order. 
No embedded blanks may appear in the operand field. Underscoring 
indicates the default value. No comments should appear in the operand 
field. 

For additional information on the CBL statement, see DOS/VS COBOL 
Compiler and Library Programmer's Guide . 
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CBL 



ADV "I rAPOST] 

noadvj l quote j 

tcatalr 1 tclist 1 

LnocatalrJ [,noclistJ 

rFLAGEl [, FL0V7[=nn] ] 

[,flagwJ 

r,LIB "I r, LVL=A I B I C I d] 

|_,nolibJ [,N0LVL J 



[, PMAP=h] 



, STATE 

[,nostateJ 

r, SXREF 1 
[, N0SXREF J 

, SYNTAX 

,CSYNTAX 

,NOSYNTAX 



,VERBREF 
,N0VERBREF 



Tseq 

[,NOSEQ 



[: 



STXIT 
NOSTXIT 



[, BUF= 



nnnnn 



COUNT 1 
NOCOUNT J 



[: 

r LANGLVL (1)1 
L lANGLVL(2) J 



, OPTIMIZE 
,OPT 

,NOOPTIMIZE 
,NOOPT 

[, SPACEn] 



[: 



SUPMAP 1 
NOSUPMAPj 



[, SYriDMP[=f ilename]] 

r, TRUNC 1 TvERB 1 

I , NOTRUNCj L NO VERB J 

r,VERBSUM 1 TzWB "1 

[,noverbsumJ [,nozwbJ 
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STORAG E RE QU-lKEMENTS 



This section defines the partition size required by the DOS/VSE compiler 
alone and the storage required by the compiler together with the DOS/VSE 
subroutine library on the core image library. The storage needed for 
the compiler, subroutines, and required IOCS modules on the relocatable 
library is also given. 



VIRTUAL STORAGE 



A minimum 64K bytes of virtual storage is required. The compiler needs 
added virtual storage if a BUF parameter, is specified on the CBL card. 
Enough extra storage must be allocated to compensate for six buffers 
of that size. 

CORE IMAGE LIBRARY 



Number of Phases 



Number of Library Blocks 
For AF3* 
(Physical Records) 



I Compiler 



26 



700 



I Transient routines 



I Library phases 



14 



32 



*A11 devices supported by Advanced Function, Release 3 



Compiler Phases 



FCOBOL 

FCOBOLOU 

FCOBOL05 

FCOBOL06 

FCOBOL08 

FCOBOL 10 

FCOBOL 1 1 

FCOBOL 12 

FCOBOL20 

FC0B0L21 



(Note 5) 
(Note 1) 



FCOBOL22 
FCOBOL25 
FCOBOL30 
F(;OBOL35 
FCOBOL40 
FCOBOL45 
FCOBOL50 
FC0B0L51 
FCOBOL60 
FCOBOL62 
FCOBOL6 3 
FCOBOL64 
FCOBOL65 
FC0B0L61 
FCOBOL70 
FCOBOL80 



(Note 2) 

(Note 6) 

(Note 7) 

(Note 3) 

(Note 2) 

(Note 4) 
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Note 1 : Phases FCOBOL05, FCOBOL06, and FCOBOL08 are executed only v/hen 
the lister feature is used. 

Not.e_2: Phases FCOEOL25 and FCOBOL6 5 are executed only when syinbclic 
debugging is used. 

Note 3; If optimization is not requested, phase FCOBOL60 is called 
instead of FCOEOL62, FCOE01637 and FCOBOL64. 

No te _ U : If FIPS processing is not requested, phase FCOBOL80 is net 
called, and compilation terminates after phase FCOEOL70. 

Phase FCOBOL05 is executed only if LIB option is set. 

Phase FCOBOL35 is executed only if USE FOR DEBUGGING is used. 

Phase FCOBOL45 is executed only if UNSTRING is used. 



Note 


5: 


Note 


6: 


Note 


7: 



Transient Routines 



$$ECOEEM (Executed only when SYMDMP, FLOW, STATE, or COUNT is 

specified. ) 
JSECCEER 
$$BCCB^B^ 
SSEFCMUL 



Library Phase s 



Executed only when SYMDMP is specified. 

ILBDMP01 
ILEDMP0 2 
ILBDMP04 
ILEDMP10 
ILEDMP1 1 
ILEDMP12 
ILBDMP13 
ILEDMP14 
IIEDMP20 
ILEDMP2 1 
ILBDMP2 2 
ILEDMP23 
ILBDMP24 
ILEDMP25 
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RELOCATABLE LIERAP.Y 



, 

I Number of liiDrary Blocks 
Number of Modules | (Physical Pecords) 



Coirpiler 



41 I Approximately 3000 



Library 



95 I Approximately ^^60 



I CCS 



Approximately 32 



Compiler Modules 

ILACBVS 
ILACBLOO 
ILACBL01 
ILACBL0 4 
ILACBL0 5 
ILACBL06 
ILACBL08 
ILACBLIO 
ILACBLI 1 

ILACBL12 
ILACBL2 
ILACBL21 
ILACBL22 
ILACBL25 

ILACBL3 
ILACBL35 
ILACBL4 
ILACBL4 5 
ILACBL50 
ILACBL51 
ILACBL60 

ILACBL62 
ILACBL6 3 
ILACBL6 4 
ILACBL6 5 
ILACBL61 
ILACBL7 

ILACBL8 
ILACB^LSI 
ILACBL8 2 
ILACBL8 3 
ILACBL84 
ILACBL8 5 
ILACBL8 6 
ILACBL8 7 
ILACBL8 8 
ILACBL8 9 
ILACBL8A 
ILACBL8B 
ILACBL8C 
ILACBL8D 
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Subroutines 

Approximate Number of 

Library Modules Bytes of Virtual Storage Blocks 

ILBDABXO 49 5 If 

ILBDACPO 1050 7 

ILBDACSO 242 2 

ILBDADRO 350 4 

ILBDANEO 325 3 

ILBDANFO 110 2 

ILBDASYO 90 2 

ILBDATBO 260 2 

ILBDBIDO 115 2 

ILBDBIEO 120 2 

ILBDBIIO 465 4 

ILBDBUGO 1080 8 

ILBDCKPO 850 6 

ILBDCLKO 6 2 

ILBDCLSO 150 2 

ILBDCMMO 1032 7 

ILBDCRDO 150 2 

ILBDCT10 480 3 

ILBDCVBO 1136 G 

ILBDDAEO 34 5 4 

ILBDDBGO 2805 16 

ILBDDCIO 180 5 

ILBDDIOO 720 5 

ILBDDSPO 1330 9 

ILBDDSRO 335 4 

ILBDDSSO 010 6 

ILBDDTEO 436 4 

ILBDDUMO 2 2 

ILBDEFLO 525 6 

ILBDETBO 260 4 

ILBDFLWO 1260 9 

ILBDFMTO 185 3 

ILBDFPWO 810 4 

ILBDGDOO 160 2 

ILBDGPWO 9 2 

ILBDIDAO 400 3 

ILBDIDBO 120 2 

ILBDIDRO 1665 8 

ILBDIDTO 695 4 

ILBDIFBO 300 3 

ILBDIFDO 160 5 

ILBDIMLO 9 2 

ILBDINSO 1932 11 

ILBDINTO 290 4 

ILBDISEO 480 4 

ILBDISIIO 370 4 

ILBDITBO 260 12 

ILBDIVLO 7 5 2 

ILBDMFTO 150 3 

ILBDMNSO 37 5 4 

ILBDMCVO 7 3 

ILBDMRGO 1150 3 

ILBDMVEO 250 3 

ILBDlvSLO 62 5 

ILBDOCRO 192 5 10 
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Approximate Number of 

iibrary Modules Bytes of Virtual Storage Blocks 

ILBDCSYO 135 3 

ILBDRCRO 150 2 

ILBDRDIO mo 4 

ILBDRDSO 240 3 

ILBDRFMO 135 2 

ILBDSAEO 400 4 

ILBDSCHO 745 4 

ILBDSEMO 2 80 5 

ILBDSETO 300 3 

ILBDSIOO 2856 17 

ILBDSMVO 60 2 

ILBDSPAO 3824 20 

ILBDSRTO 3720 19 

ILBDSTRO 8 3 

ILBDSSNO 300 3 

ILBDSTGO 672 6 

ILBDSTIO 600 4 

ILBDSTNO 1740 8 

ILBDTABO 4 75 4 

ILBDTCOO 1170 7 

ILBDTC20 500 3 

ILBDTC30 4220 19 

ILBDTEFO 600 6 

ILBDTODO 200 2 

ILBDTRNO 260 2 

ILBDUPSO 110 2 

ILBDUSLO 365 3 

ILBDUSTO 2176 12 

ILBDUTBO 260 12 

ILBDVBLO 315 4 

ILBDVCOO 515 3 

ILBDVIOO 4660 22 

ILBDVMOO 4 70 4 

ILBDVOCO 4280 18 

ILBDVTRO 140 2 

ILBDWTBO 260 3 

ILBDXDIO 275 3 

ILBDXIIUO 1G5 2 

ILBDXPRO 670 6 

ILBDXTNO 290 3 



IOCS MODULES 



Needed when the ASCII Support Feature is used 

IJFXBZZN 
IJFXBZZZ 
IJFXZZZZ 
IJFNZZZN 
IJFNZZZZ 
IJFRZZZN 
IJFRZZZZ 
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APPENDIX. DEVICE INF0RI1ATI0N 



This appendix gives information regarding specific input/output devices 
that can be used with a DOS/VS COBOL program. 



MINIMUM AND MAXIMUM BLOCK SIZE VALUES 



The minimum and maximum block sizes that can be specified for specific 
devices are shown in Figure 7. 



Device 

Type 


Fi 
Bl 


xed 

ock 


and Undefined 
Size (Bytes) 


Records 


Variable Records 
Block Size (Bytes) 

Minimum Maximum 




Minimum 


Maximum 


Card Reader 






1 


80 




9 




80 


Card Punch 






1 


81 




9 




89 


Print Line Length 
(1403, 3800, etc. 
120 characters 
132 characters 
144 characters 
150 characters 






1 
1 
1 
1 


121 
133 
145 
151 




9 
9 
9 
9 




129 
141 
153 
159 


Magnetic Tape 






18 


32760 




18 




32760 


Direct Access 
2314 
3330 
3340 
3350 
3375 






1 
1 
1 
1 
1 


7294 
13030 

8368 
19069 
32760 




9 
9 
9 
9 
9 




7294 
18030 

8368 
19069 
32760 


Notes: 


















1 . For DOS/VSE Fixed Block Architecture devices 
describing the devices you are using. 


, see 


the 


manuals 


2. For direct access 
maximum is 32760 


devices 
for each 


with the 
device . 


track overflow 


fea 


ture, the 



Figure 7. DOS/VS COBOL Devices--Minimum and Maximum Block Sizes 
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INDEX 



ipostrophe, APOST option and 25 
irithmetic expressions with COMPUTATIONAL 
fields: TRUNC/NOTRUNC option and 25 
\SCII collating sequence support 
ASCII parameter required 23 
IOCS modules required 30 
Sort/Merge Program required 2 



background partition support by CMS 
BUF option (CBL statement) 

format 25 

virtual storage required when 
specified 26 



CATAL option, SYSLNK file and 3 
CATALR/NOCATALR option (CBL statement) 

format 25 
C.CBLOPTNS source statement library 

member 24 
CBL statement: COBOL option control 

statement 24-25 
CDMOD modules names 11-12 
changing the installation defaults 24-25 
CLIST/NOCLIST option (CBL statement) 

format 25 
CMS considerations 

background partition supported 7 

device support 3,6 

execution time requirements 1,7 

installation requirements 1,6 

LIOCS modules and 9 

machine configuration 6 

private library access 3 

separate library not needed 1 

SYSLNK not supported 6 

system requirements 2,3 

work file requirements 7 
compiler 

CBL statement options 

formats 25 

system options controlling 25 
compiler and library 

contents 1 

installation 22-23 

storage required 26 
COMPUTATIONAL receiving fields, 

TRUNC/NOTRUNC option 2 5 
condensed listing, compiler, specified by 

CLIST option 25 
contents of DOS/VS COBOL compiler and 

library program product 1 
core image library 

storage required for compiler, and 
library phases 26 
COUNT/NOCOUNT option (CBL statement) 

format 25 

installation parameter required 23 

virtual storage required 4 
CSYNTAX/SYNTAX/NOSYNTAX option (CBL 
statement) 

format 25 



DAMOD module names 13 

debug (see SYMDMP option) 

default values of CBL statement options, 
changing 24-25 

devices 

compiler use 3-4 

minimum and maximum block sizes 31 
Sort/Merge Program requirements 4-5 
storage requirements for 26 
supported by CMS 6 

disk units, work file allocations to 6-7 

DRMOD names 14 

DUMOD module names 14 



execution statistics: virtual storage 

required 4 
execution-time considerations 4 
execution-time CMS requirements 1,7 



Federal Information Processing Standard 

(see FIPS) 
filenames (work files) 3 
files, system: installation parameter 

required 23 
files, work (see work files 
FIPS 

considerations 6 

flagger, LVL option specification of 25 

work files 

allocations required 8 
contents 8 
fixed block devices 3,8 
FLAGW/E option (CBL statement) 

format 25 
FLOW option (CBL statement) 

additional storage required 4 

format 25 

installation parameter required 23 
FOPT macro instruction, parameters 

required for 23 
installation procedure 

changing option defaults 24 

compiler and library -- DOS/VSE 22 

compiler and library -- VM/SP 23 

system generation considerations 23 
installation requirements for CMS 1 
IOCS modules 

ASCII support 30 

blocks required for storage 28 
CDMOD names 1-12 

DAMOD names 13 

DRMOD names 14 

DUMOD names 14 

introduction 9 

ISMOD names 15 

MTMOD names 16 

naming conventions for relocatable 
library 9 

PRMOD names 18-19 

required 21 

DSMOD names 20 
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system 17,21 
ISMOD module names 



15 



quotation marks, QUOTE option and 
QUOTE/APOST option (CBL statement 
format 25 



25 



library 

installation parameters governing 

partitions 23 
object-time subroutine 
contents 1 

storage required 26-30 
LIB/NOLIB option (CBL statement) 

format 25 
line-spacing on compiler output listing 

SPACEn option and 25 
LINK option (OPTION statement) 

SYSLNK file and 3 
LIOCS modules and CMS 9 
lister feature: compiler phase 

names 26-27 
logical units: assignment for compiler 

use 3 
LST statement (lister feature) 

CMS does not support 24 
LVL option (CBL statement) 
format 25 



machine configuration 
for CMS 6-7 
for DOS/VS 3 
macro instruction parameters required for 
DOS/VS compiler and library 
installation 23 
MTMOD module names 16-17 
object-time subroutine library 

contents 1 
operating system requirements 2-3 
OPTIMIZE/NOOPTIMIZE option (CBL statement) 

format 25 
options 

CBL statement 

changing installation defaults 24 
format 25 
LST statement 

format 25 
system 23 



parameters required in SUPV, FOPT, and VSAM 

macro instructions 23 
phases, compiler 
blocks required 

core image library 26 
relocatable library 28 
listed 26 
PMAP=h option (CBL statement) 

format 25 
private library 
CMS access 2 
core image, effect of macro instruction 

on 24 
DOS/VS compiler and library added to 
saving previous compiler and library 
PRMOD module names 18-19 
program logical units: required 
assignments 3,7-8 



relocatable library 

blocks required for compiler, library, 

and IOCS modules 28 

required IOCS modules 21 



sample program 

using after installation 22 
SDMOD module names 20-21 
separate library unneeded for CMS 1 
separately-signed numeric sort keys: 

Sort/Merge program required 2 
SEQ/NOSEQ option (CBL statement) 

format 25 
SORT verb operating system requirements 
Sort/Merge feature 

considerations 4-5 

program produce required 2 
SPACEn option (CBL statement) 25 
STATE/NOSTATE option (CBL statement) 

additional storage required 4 

format 25 

installation parameter required 23 
statistics, execution: virtual storage 

required 4 
STIXIT/NOSTIXIT option (CBL statement) 

format 25 

installation parameter required 23 
storage requirements 

core image library 26-27 

general description 3 

partition size 26 

relocatable library 28-30 

sort/Merge program 4 

subroutines (each) 29-30 
subroutines, object-time, storage required 

for each 29-30 
SUPMAP/NOSUPMAP option (CBL statement) 

format 25 
SUPVR macro instruction, parameters 

required for compiler 23 
SXREF/NOSXREF option (CBL statement) 

format 25 
symbolic debug considerations 5 
symbolic dump option (see SYMDMP option) 
SYMDMP option (CBL statement) 

format 25 

general considerations 4-7 

installation parameter required 23 

multiple COBOL compilations 5 

work files 4-5 
SYNTAX/CSYNTAX/NOSYNTAX option (CBL 
statement) 

format 25 
SYSLNK file 

assignment for compiler use 3 

CATAL and LINK options and 3 

not supported for CMS 6 

required 6 
SYSRES file assignment required 7 
system, DOS, minimum release level 
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required 2 to 8 

system generation considerations 23-24 3350 direct access storage 
system I/O module names used with CMS 6 

MTMOD 17 used with Sort/Merge 4 

SDMOD 21 work files 3,8 

system options 25 3886 Optical Character Reader 

system requirements GETVIS parameter required 23 

for CMS 2 virtual storage required 4 

for DOS/VSE 2 
machine configuration 
for CMS 6-7 
for DOS/VSE 3-4 
SYSOOn work files; assignment for compiler 

use 3,6 
SYS005 for symbolic debug feature 3,6 
SYS006 FIPS work file 3,6 

tape work file requirements 7 
transient routines 

core image library storage required 26 

listed 27 

object-time library, in 1 
TRUNC/NOTRUNC option (CBL statement) 

format 25 

units, logical: assignment for compiler 

for CMS 6 

for DOS/VSE 3-4 
using the sample program 22 

VERB/NOVERB option (CBL statement) 

format 25 
VERBREF/NOVERBREF option (CBL statement) 

format 25 
VERBSUM/NOVERBSUM option (CBL statement) 

format 25 
VSAM macro instruction parameters 

required 23 
work files 

allocation 

disk devices 7-8 
CMS requirements 6 
DOS/VS requirements 3 
filenames 3,6 
FIPS 6 
module names 

MTMOD 17 

SDMOD 21 
partitions, effect of on assignment 7 
symbolic debug feature 5-6 
ZWB/NOZWB option (CBL statement 

format 25 

2311 disk unit, work file allocations 
to 8 

2314 disk device 

core image library storage for 26 

work file allocation to 8 
3330 disk device 

core image library storage for 26 

used with CMS 6 

used with Sort/Merge 4 
3340 disk unit, work file allocations 
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